home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Stacks / Hyper Graphics / Random Graphics / Funny Day / card_3135.txt < prev    next >
Encoding:
Text File  |  1988-04-24  |  780 b   |  44 lines
  1. -- card: 3135 from stack: in
  2. -- bmap block id: 6865
  3. -- flags: 0000
  4. -- background id: 2592
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on idle
  8.   global count
  9.   global switch
  10.   if switch is 1 then
  11.     play "boing" ha
  12.     go back
  13.   else if switch is 2 then
  14.     visual effect dissolve
  15.     go next
  16.   end if
  17. end idle
  18.  
  19.  
  20.  
  21. -- part 7 (button)
  22. -- low flags: 00
  23. -- high flags: 0000
  24. -- rect: left=156 top=53 right=320 bottom=257
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 0 / 0
  27. -- text alignment: 1
  28. -- font id: 0
  29. -- text size: 12
  30. -- style flags: 0
  31. -- line height: 16
  32. -- part name: 
  33. ----- HyperTalk script -----
  34. on mouseDown
  35.   global count
  36.   global switch
  37.   put 50 into count
  38.   put 0 into switch
  39.   visual effect dissolve
  40.   go first
  41.   show button "About"
  42. end mouseDown
  43.  
  44.